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What is it ? 



Well, here it is: a HardCore Update. 
What is an Update f It's a monthly 
mini-mag of early - release information 
that will be appearing in the upcoming 
HardCore Comouting issue. In addition 
to the updates of important columns, it 
will contain news items and various 
notes and notices of interest to apple 
comouterists. 

The early release of an article in an 
Update gives readers a ohanoe to ques- 
tion, correct, modify or add to that 
article before its final appearance in 
the magazine proper. Our writers do not 
claim to be "know-it-alls" and there- 
fore are willing to be assisted or cor- 
rected by our readers. In fact, your 
assistance is neoessary for the very 
existence of this type of magazine. 

Our writers are no different from 
most of our readers except that they 
have submitted (and had accepted by us) 
a testimonial of their interest in corn- 
out ering: an artiole or column. Some 
of the artioles began as letters to the 
editor. HardCore articles are very 
much Like the programs we offer: they 
are subject to the scrutiny of our 
readers so that they may be improved. 
That means that when it is reprinted in 
the following issue, that same article 
will be somewhat different, perhaps 
with more illustrations, or footnotes, 
or whatever was lacking according to 
our readers response. 

This oarticuiar Update contains sev- 
eral items awaiting your examination: 

1... The promised uodate to Bobby's 
column on Copy— Protection begins with 
an explanation' of the disk itself. We 
would like to know if it is too ele- 
mentary or if it needs more basic ex- 
planations. Please let us know. 

2... The creation of the Ultimate Ad- 
venture Program begins, naturally, with 
a request for ideas, assistance, com- 
plaints, and other manner of input from 
our readers. This will be a reader-de- 
signed adventure game that should top 
all adventure games and Leo is going to 
show you how it is written. In fact. 
He's writing it right now... 

3... You have all probably heard of 
(and played) Invaders..., Well, to show 
that you can play graphic games on the 
text page, We present the premier list- 
ing of Text Invaders l.l (by none other 
than yours truly,..) Written in Apple- 
soft, this particular version of that 
old standby arcade favorite, has all 
the thump-thumps of the arcade version, 
and the disintegrating bunkers, explod- 



ing tanks and dying invaders so famil- 
iar to video-game enthusiasts.... but 
with a twist. Your gun has a value of 
1 to 7, and so do the marching inva- 
ders. If you shoot one with a number 
higher than your gun's value, all you 
do it lower the invader's number. This 
program will be presented in Issue #2 
as a lesson in Applesoft string manip- 
ulation. It is listed here for those 
who are familiar with strings and would 
like to got a jump on the next issue. 
We would like you to make improvements 
on it if you can... 

Finally, we have a host of tidbits: 
A. ..We're still are looking for pro- 
grams, even ones as simple as Text In- 
vaders! Most programs can be used to 
teach some aspect of computering. 

B.. .Remember that first long and 
complete program you actually created 
by yourself? We'd like to know what it 
was ( tio-tac-toe, or black- jack:, or a 
reoioe data file, or maybe just a tel- 
ephone "list-and- search" program, or a 
simole arcade game) and whether you'd 
like to have it published in our upcom- 
ing series on "My First Program". Em- 
phasis will be on your learning experi- 
ence and how you would write that same 
program today. Many of our readers are 
just learning the various languages and 
would profit by discovering some of 
your learning experiences, problems and 
their resolutions. Some of the pro- 
grams will be used in other columns 
such as: Apple Softies, Into Integer, 
Pascal Primer, and others. 

C.We might have made a mistake in 
shipping out the Alerts via bulk mail. 
We discovered that Bulk takes around 3 
weeks, and that sort-of defeats the 
whole purpose of having an Alert (They 
also may not have arrived at all, so 
we've reprinted the Alert notice in 
this uodate.) We are going to examine 
our mailing practices and try to get a 
second class mailing permit (which can 
take over half a year to get). Mean- 
while, no more bulk mail shipping of 
Alerts. 

D...It seems that we are not only- 
disliked by many of the software vend- 
ors (software houses and retail outlets 
like computer stores), but some of the 
clubs also do not care for HardCore's 
Free Press Editorial Policy of "pub- 
lishing all legal useful information on 
apple computering" (which includes, of- 
course, information on "copy- protect- 
ion"). So it seems that information 
suppression will go on and on and on. , . 
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DISKLOCKS update: how to 

This column is the Undate to the DISKLOCKS that appeared in the Premier Issue. The 
tables and illustrations (or 16-seetors C3.3 DOS> 48 K. We plan to have tables for 
the 3.2 DOS when this Update appears in Issue 2, as well as any suggested changes and 
addttiotis that readers send us. Copy-protection should be employed by the individual 
user for purposes of disk file protection, not just by software vendors who wish to 
discourage piracy or prevent program alterations. 



Cooy protection can be loose- 
ly divided into 4 methods. 

1. copy-protected disks 

2. software protection 

3. hardware protection 

4. memory orotection 



I say "loosely" because each 
area overlaps the others. Me- 
thod 1 usuailv involves changing 
the format of information on a. 
disk. The disk is not copyabie 
by normal means. In method 2 



the urogram goes back to the 
disk and searches for a particu- 
lar pattern. The disk is seem- 
ingly copyabie but bombs after 
the program is run. And in me- 
thod 3 a card or other hardware 




A diskette with the cover oeeled awav, 
and a sector sliced out and moved to 
cage 5, 
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COPY-PROTECT your disks 



is used by the program. The 
disk is oopyable but requires 
the hardware tt> run. Method 4 
is really a subgroup and i* em- 
ployed by the other three pro- 
tection scheme*?, tt includes 
such thinos as: locking— out the 
'reset and control "C". 

The number of ways that pro- 
prams can be protected has yet 
to be counted. Some companies 
even use other computers to de- 
vise disk formats that cannot be 
duolieated by the Apple. 

In this article we will look at 
method one: Protecting your pro- 
gram by altering the disk format. 
In order to to understand these 
changed formats you need to 
first look at a normal disk. The 
flexible (or floDpy) diskette ean 
be thought of as a disc-shaped 
oiece of recordina taoe, and es- 
sentially that's all it is. The 
reason for the flat disc shape 
as opposed to using a flat strip 
as in a tape is for speed of in- 
formation retrieval. For instance, 
if vou were to have a program 
stored in the middle of a tape, 
the computer would have to 
HEAD in all of the tape preceed- 
ing the area where your program 
resides. This method of inform- 
ation retrieval is known as "se- 
auential access" The disk, on 
tne other hand, is set up in 
such a way that the computer 
pan go directly to a piece of da- 





35 track: 



16 sector! 



JTGTJSE 1 



ta or program by scanning the 
disk laterally. This method of 

information retrieval is known 
as "random access". 

When a disk is INITialised the 
Disk Operating System (DOS) di- 
vides it into 35 concentric 
tracks ( see figure i>. It then 
divides each traok into 16 blocks 
called "sectors". Eaoh sector 
contains an address mark and i 
data mark. These marks are a 
uniaue set of bvtes that are 
used bv DOS like street signs. 

The address mark tells the 
DOS what traok/ sect or it is cur- 



Track $22 (34) — to — Track 500 <0) 




A 

, Die 
section 
showing the 
contrast m area 
occupied by each track/ 
sector. There are 35 track/ 
sectors (usually iust called*, sectors) 
in each pie section. The grey area has 
been enlarged and moved to page 6. 



FIGURE 2 



rently READing. Tt contains the 
volume, track, sector and check- 
sum information. The data mark 
surrounds the actual data. It 
tells the DOS where the data 
begins and ends and contains a 
checksum that is used to verify 
the accuracy of the data. 

If you have ever tried to 
LOAD a program, and the disk 
drive started making a slight 
chatter, chances are that the 
DOS could not HEAD one of 
these markers. It then recali- 
brates the READ/WRITE head by 
moving it back to track zero and 
stepping ( counting each track 
that it oasses over) back out to 
where it was supposed to be. 

The tracks are numbered from 
$00 (0) to $22 (34> and the sec- 
tors from $00 (0) to S0F (15). 
Trscfc 500 thru track $02 ( a 
total of three tracks: sero, one 
and two) contain the Disk Oper- 
ating System or "DOS". 

The DOS gives the AppJe the 
ability to manipulate data on a 
diskette. In this program are all 
of the commands related to con- 
trollina this disk drive ( i.e.: 
CATALOG. WIT, LOAD...) and a 
set of error messages which, un- 
Usss you are either a maaician 
or don't use the Disk II," you 
have probably seen before. 

The disk controiler card that 
conneots the Disk II to the Ap- 
ple also has a small program on 
it. When vou BOOT a disk, this 
urocram tells the Disk II to 
READ track $00 (0), sector $00 
(0) (remember, we start counting 
at zero instead of one) into 
memory. The program on track 
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SOf), sector $00 contains the in- 
formation required to READ in 
sectors 400 thru 509 on track 
$00. The arooram on sectors 
■.500-109 READs "in the remaining 
inf ormati on on track % 00 - 3 "l. 
Thus the Apole LOADs the DOS. 

At this Doint DOS takes over 
and RUNs the program you have 
INITialiaed the disk with. 

In order to find your HELLO 
program DOS ooes to the Volume 
Table of Contents CVTOO and 
Direct orv iocated on track $11 
<17>. The VTOC or "bit map" 
shows which sectors are in use 
and which are free. The Direct- 
ory begins on sector S0F (JS) 
and continues down to sector $01 
(13. The VTOC and Directory 
are used by DOS whenever you 
SAVE or DELETE a file. The Di- 
rectory contains a list of all 
the files on the disk. Each en- 
try contains a pointer to the 
track/sector list, file-locked and 
file-tvue code, file-name and 



KIGUSE 3 

SECTOR FORMAT 



file-size. ^ The 

track / sector list is a list of 
track/sector pairs that are used 
to store that program. This is 
why SAVEinq a blank file always 
takes 2 sectors. One for the 
blank file and one for the traefc- 
/sector list 

DOS formats a track by first 
writing a unique byte called a 
"sync byte". This byte (norm- 
ally $FF) allows the Disk II 
hardware to synchronize with 
the data on the disk. DOS then 
WRITEs an address mark, some 



more svnc bytes and the data 
mark. At this time the data 
field is full of SOO's. 

The following is a normal 
address mark: 

D5AA96FFFEAABHAEAAFBEFDEAAEB 

It can be broken down into: 
Start of address - D5 AA 96 



Volume number 
Track 
Sector 
Checksum 

End of address 



- FF FE 
- AA BR 

- AE AA 

- FB EF 

- DE AA EB 



C 




Svnc Bvtes 
5-10 bytes 



Start of Data 



Data Field 
342 bvtes 



Checksum 

End of Data 



<3 -+- 



AA+AA-00 
AA+AB-01 
AA+AE.04 
AA+AF»05 

AA+BA-lfl 

AA+BBal ] 

AA+3E. \ 4 

AA+BF-S 3 

AA+EA-40 

AA+EB-4 1 

AA+EE-44 

AA+EF.43 

AA+FA-50 

AA+FB-5 1 

AA+FE-34 

AA+FF-55 

AB+AA-02 

AB+AB-0 3 

AB+A2-06 

AB+AF-07 

AB+BA»t 7. 

AB+BE.1 3 

AB+8E-1 & 

AB+BF.l 7 

AS+EA-42 

AB+EB-43 

AB*EE*4<4 

AB+EF-47 

AB+-FA-32 

AB+FB-53 

AB + FE = 5 4 

AB+FF-5 7 

AE*-AA-0 8 

AE+AB-09 

AE+AE-0C 

AE+AF-0D 

AE*SA-1 3 

AE+BB»1 9 

AE+BE-1C 

AE+BF-1D 

AE+EA-48 

AE+EB-4? 

AE+EE»4C 

AE+EF-4D 

AE+FA-38 

AE+FB-5 9 

AE+FE»5C 

AE+FF-5D 

AF+AA*0A 

AF+AB«0B 

AF+AE«0E 

AF+AF.OF 

AF+BA=1A 

AF+SBalB 



CONVERSION CHART 



AF+BE-1E 
AF+BF-1 F 
AF+EA-4A 
AF+E3-4B 

AF+EE»4E 

AF+EF-4F 

AF+FA-5A 

AF+FB-3B 

AF+FE-5E 

AF+FF-5F 

BA+AA«20 

BA+AB-21 

BA+AE-24 

BA+AF-25 

BA*BA»30 

BA+BS-3 1 

BA+BE-34 

BA+BF-3S 

BA + £A»<$Q 

BA+EE-4 1 

BA-+ EE»d4 

BA+EF.A5 

BA+FA-70 

BA+FB-71 

BA+FE-74 

BA+FF-73 

EB+AA«22 

BB+AB-23 

BB+AE-2* 

BB+AF«27 

BB+BA»32 

BB+BB-33 

33 + 3S=.3i 

BB+BF-37 

3B+EA=d2 

BB*EB = <£3 

3B + EE = i(i 

BB+EF-47 

BB+FA-72 

BB+FB-73 

3B+FE-76 

BB+FF-77 

BE+AAs28 

BE+AH*2? 

3E+AE«2C 

BE+AF*2D 

B£+BA=38 

BE-f-BB«39 

3E*BE=3C 

BE+EF=3D 

B£+SA=46 

BE+E3m69 

3E+EE=6C 

HE+EF=4D 



3E+FA»78 

BE+FB-7 9 

BE+FE-7C 

BE+FFa7D 

BF+AA-2A 

BF*AB«2B 

BF+AE-2E 

3F+AF-2F 

3F+3A-3A 

3F+BB.3B 

BF+BE-3E 

BF+BF«3F 

SF*EA=4A 

BF+EB-4B 

BF+EE.4E 

BF+EF-6F 

BF+FA-7A 

BF+FB- 71 

BF+FE-7E 

BF+FF-7F 

EA+AA-80 

EA+AB-8 1 

EA+AE-84 

EA+AF-83 

EA+BA-90 

EA+BB-? 1 

EA+BE-94 

EA+BF-93 

EA+EA-CQ 

EA+E3-C1 

EA+EE-C4 

EA+EF=C3 

EA+FA-D0 

EA+FB-Di 

EA+FE-D4 

EA+FF-D5 

E3+AA™32 

EB+AR»83 

E3+A£=86 

EB+AF»87 

EB+3A-92 

EB+BB=93 

E3+HE396 

EB+3F-97 

EB+EA»C2 

EB+EB^C3 

EB+EE*C* 

EB+EF»C7 

EB+FA=D2 

EB+FB=D3 

EB+FE=D6 

EB+FFaD7 

EE+BA=98 

EE+BB-99 



EE + 3E = 

EE-t-BF. 

EE+EA> 

EE+EB: 

EE+EE= 

EE + EF = 

EE-*-FA> 

EE+FB- 

EE+FE> 

EE+FF= 

EF+3A* 

EF+BB= 

EF+BEa 

EF+-BF = 

EF-hEA> 

£F+EB= 

EF+EE- 

EF+EF. 

EF+FA» 

EF+FB- 

EF+FE- 

EF+FF» 

FA+EA- 

FA-hEBa 

FA-^EEa 

FA+EFs 

FA+FA- 

FA+FB- 

F-A + FE- 

FA+FF- 

FB+EA- 

FB+EB- 

FB+EE= 

FB+EF- 

FB+FA. 

FB+FB. 

FB+FE- 

FB+FF- 

FE+EA- 

FE+EB> 

FE+EE- 

FE+EF. 

FE + FA=. 

FE+FB- 

FE+FE- 

FE+FF- 

FF+EA- 

FF+EB« 

FF+EE= 

FF+EF= 

FF+FAa 

FF+FB- 

FF+FS= 

FF-t-FFa 



-9C 
«9D 
• C8 
*C9 
iCC 
-CD 
>DS 
*D9 

■ DC 

■ DD 

■ 9A 
t 9B 

■ 9E 
.?F 
.CA 
iCB 
>CE 
«CF 
iDA 
>DB 
'DE 

■ DF 
E0 

iEl 
3 4 
^E3 
F0 

F4 
F5 
E2 
£3 
E6 
£7 
F2 
F3 
DE 
DF 
£3 
E9 
EC 
ED 
F8 
F? 
FC 
FD 
EA 
EB 
£E 
EF 
FA 
FB 
FE 
FF 
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The volume, track, sector and 
checksum are in 4 + 4 coded for- 
mat (see 4+4 conversion chart >, 
This means that 4 bits in each 
byte is actual data. The first 
bvte is rotated left and logic- 
ally ANDed with the second byte 
to recover the data. 

The data mark consists of: 

Start of Data — D5 AA AD 

Data Field ~ <342 bvtes) 

Checksum — (2 bytes) 

End of Data — DE AA EE 

The data field is encoded in 
a 2+6 format. Six bits of each 
.byte is valid data. 

For those of you who are in- 
terest erf in more details and 
think I glossed over some things 
<and I did), the best book I have 
seen that talks about DOS is 
BENEATH APPLE DOS hv Don 
Worth and Fieter Lechner. A 
worthwhile addition to any Ap- 
ple computerist's library. 

There are two things to con- 
sider when you decide to protect 
your disk. Protecting against 
normal DOS copiers and protect- 
ing against bit <nibble) copiers. 

The first is fairly simple. Al- 
most any change in the normal 
disk format will cause DOS to 
generate an I/O ERROR. The 
end-of -address and end— of— data 
bvtes (DE AA) are not used in 
the initial BOOT. Therefore, 
o hanging these bytes will allow 
a disk to SOOT but not allow 
normal DOS to copy it. The easi- 
est method of accomplishing this 
is to change the appropriate lo- 
oations in DOS and INITialize a 
disk with the changes. However, 
LOADing anything other than 
vour "hello" program onto this 
disk could be tedious. You would 
have to change the DOS back to 



normal, LOAD your program from 
a normal disk then change those 
same DOS locations and SAVE 
the urogram tc your protected 
disk. Another method would be 
to LOAD the programs from the 
oassetto input and SAVE them to 
the disk. The best method would 
be to use Muffin to upLOAD your 
programs from a normal disk. 
This w<trks because Muffin uses 
an internal DOS CRWTS) imaoe 
to READ data and tne resident 
DOS to WRITE data. A more ele- 
aant method is afforded by tak- 
ino advantaae of the way that 
DOS WRITEs data to the disk. 
When DOS WRITEs a sector, it 
first looks for the address mark. 
When it has found the correct 
mark for the sector it wants, 
DOS WRITES a whole new data 
mark. It first WRITEs 5 sync 
bvtes then the complete data 
mark with the new data. Every 
time vou SAVE data to a disk 
this orooess is repeated. NOTE: 

The address mark is only writ- 
ten once when the disk is INIT- 
i&lized. A program could be writ- 
ten that would READ the data 
from a normal disk and WRITE it 
to another in a changed format. 
This changed disk would not be 
sooyable by any normal DOS. 
Table 1 is a list of address and 
data mark looations and their 
normal values for a 48K Apple. 

CAUTION: Alwavs change both 

the READ and WRITE looations 
for anv byte you alter. Also, 
not all values are valid. See 
table 2 for a list of valid bytes 
to use when making changes. 

The second part of disk pro- 
tection involves bit or nibble 
copiers. These programs do not 
deDftnd on a rigid structure of 
address and data marks to find 



DOS 3.3 ADDRESS AND 
D AT* A MARK r.<3CA.TIOr>£S 



DOS 3 . 3 



READ LOCATIONS 



■HEX- 



■ DECIMAL- 



WRITE LOCATIONS 
-HEX- -DECIMAL- 



START OF 
ADDRESS 



END OF 
ADDRESS 

START OF 
DATA 



END OF 
DATA 

SYNC BYTE 
SYNC BYTE 



B955 D5 47445 2 13 
895F AA 47455 170 
B9 6A 96 47466 150 



BC7A D5 45250 213 
BC7F AA 48255 170 
BC84 96 48260 150 



E99 1 
E99B 



DE 
AA 



47505 
475 15 



222 
1 70 



SCAE 

ECB3 



DE 
AA 



48302 
48307 



22 2 
1 70 



B8E7 D5 47335 2 13 
ESF1 AA 47345 1 70 
B8FC AD 47356 173 



B853 D5 47 187 2 13 
B858 AA 47 192 1 70 
B85D AD 47197 173 



B935 DE 
B93F AA 



474 13 
47423 



222 
170 



B89E 
BSA3 



DE 
AA 



47262 
47267 



222 
1 70 



BC60 FF 





TABLE 2 




Z»m 


a 3.1 


valxjes 


tha 


t ar 


@ used 


t. Q 


cJi -3, an ci ct 


■tire* 


start and e:n.e3 


by 


"t ^£5 


of the 


address arid 


«a 


a t 3. 


xn.-a.ir 


Ics> 


HEX 


DEC 


HEX 


DEC 


96 


150 


D5 * 


2 1 3 


97 


15 1 


D6* 


2 1 4 


9A 


15 4 


D7* 


21 5 


9B 


1 55 


D9 


2 i 7 


9D 


1 57 


DA* 


2 1 8 


9E 


1 58 


DB* 


2 1 9 


?F 


1 5 9 


DC* 


220 


A6 


1 66 


DD* 


2 2 1 


A7 


167 


DE* 


222 


AA* 


170 


DF* 


223 


AB* 


1 7 1 


E5 


229 


AC* 


1 72 


E6 


230 


AD* 


1 73 


E7 


23 1 


AE* 


1 74 


E9 


7,3 3 


AF 


1 75 


EA* 


234 


B2 


1 78 


EB* 


235 


B3* 


1 79 


EC* 


236 


B4* 


1 30 


ED* 


237 


BE * 


1 8 1 


EE* 


238 


B6* 


1 82 


EF* 


239 


E7 


1 8 3 


F2 


242 


B? 


1 85 


F3 


243 


BA* 


1 86 


F4* 


244 


BB* 


1 87 


F5* 


245 


BC* 


1 88 


F6* 


246 


BD* 


1 89 


F7* 


247 


BE* 


1 90 


F9 


24 9 


BF* 


I 9 1 


FA* 


250 


CB 


20 3 


FB* 


25 1 


CD 


205 


FC* 


252 


CE 


206 


FD* 


253 


CF 


207 


FE* 


254 


D3 


21 1 


FF* 


255 


* 


- Use 


on 1 y 


these 


values as 


sync 


■y t es 



valid data. Instead they make 
as few assumptions about the 
disk format as possible. These 
copiers use pattern recognition 
to find the data. They are not 
as reliable as a normal DOS 
copy program since they don't 
use checksums. Many of the 
current bit copiers do make one 
assumption. They look for a SFF 
sync byte. These copiers oan be 
defeated by INITializing a disk 
with a different sync byte. I am 
sure that the new crop of bit 
copiers will have corrected this 
oversight but until then this is 
a valid protection method. The 
location of the sync bvtes are 
given tn table 1. CAUTION: not 
all values are valid as sync 
bytes. See table 2 for a list 
of usable bytes. 

Upcoming Special Program: 
A NIBBLER 
that allows vou to examine the 
encoded data on any disk. 
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Customizable Modular 



This is not a column on the princi- 
ples of adventuring or a critique on 
adventure programs. It is, rather, a 
series of articles and programs that, 
when completed, will result in a cus- 
tomizable, hi-tes color action (arcade- 
-style) and text, adventure aame for the 
Alt* 48K with Applesoft in ROM and disk 
drive. It will consist of numerous 
sub-programs (Modules) that, will be se- 
quentially RUN or accessed so that cus- 
tomizing becomes a simple matter of 
providing different Modules to make it 
a different game. 

There will be 6 installments to be 
published in the nest three issues and 
intervening updates beginning with this 
one. 

(1) Update y — this article.. 

Introduction to Role- Playing Adventure 
Computer Games. 

<2f Issue #2 — Oet. 

Maze-maker, Personality Profiler, and 
Map-displayer programs. 

(3) Uodate 2.1 — Nov. 

Moving through a hi-res maze (using 
shape tables ), adding test files of 
maze data. 

(4) Uodate 2.2 — Dec. 

The command interpreter part I: 3-mode 
network and a large vocabulary* 

<5> Issue #3 — Jan. 

The command interpreter part II: The 
command oode deooder and associated 
text files. 

(£) Uodate 3.1 — Feb. 

Preliminary RUNning, adding additional 
features: Arcade modules, Hi-res pics. 

(7) Update 3.2 — Mar. 

Customizing the command and description 
textfiles and variables, adding another 
set of arcade modules. 

(fl) Issue #4 — Apr. 

HUNning the final adventure (How all 
the pieces fit together >. 

This "adventure" will be a true 
role-playing game utilizing a "maze" 
j; as a background through which you must 
travel in quest of your elusive goals. 

So... How is this different from 
other adventures? Simple. This one is 
being written after the others have 
been out for a while and we have learn- 
ed from the mistakes of those oioneers. 
It has NOT already been written. This 
means that reader input, whether they 
be requests far game characteristics, 
complaints, or actual program changes, 
will be considered in its design. You 
are encouraged to write in so that this 
game becomes a reader -designed game and 
not a pre- packaged, "copy-proteoted - ' 
"black- box" game like so many now 
available] For those advanced in pro- 
graming, your input is needed. And for 
those just beginning to learn Apple- 



— soft, this is a great way to supple- 
ment your growing familiarity with this 
version of BASIC 

This game will be written in dis- 
crete modules, or stages, that can be 
easily debugged of typos. It can, and 
will be explained in detail (that's why 
it will take so long to publish ). You 
will learn how it works, why it works, 
and how to change it to fit your own 
ideas of what a true adventure game 
should be. 

It will use the hi-res page to dis- 
play an animated color map and all the 
aroade (conflict) scenarios as well as 
any of the detailed hi-res pictures 
(pios) that will be loaded at important 
junctions of the game sequence. (These 
oics can either be purchased from the 
HARDCORE library or oan be drawn using 
almost any of the commercial hi-res 
graphics packages or possibly with our 
own... At that time, we wilJ be active- 
ly soliciting hi-res pics to illustrate 
the games. These pics will be purchased 
from the reader-artists and offered for 
sale from the program library. At that 
time we will also be purchasing your 
own customized modules. 

All of this means that this adven- 
ture will actually be a combination of 
adventure, "interactive fiction", roie- 
-playing, maze - marching, and arcade 
"shoot -em- ups" linked together in one 
consistent but highly variable game. 

The game will be almost entirely 
written in Applesoft, so that user mod- 
ification is fairly easy to accomplish. 
(Some of the arcade sequences may have 
machine language subroutines, but these 
will be poked in from the Applesoft 
program. The same goes for the numerous 
shape tables used to animate the maze 
Map.) 

The comoles command- parser or inter- 
oreter will probably be quite large so 
that it oan handle almost any command 
the stalwart adventurer can type in. 
And because I plan on using both hi-res 
pages, all the rest of the program will 
be stored as test-files on the disks. 
That means frequent disk access (and 
possibly a modified DOS'??). 

Each game-sequence will initially 
begin with a randomized Mazo-maker and 
Personality-maker where you may create 
a set of characters to occupy the maze 
with you and interact with you. These 
came personalities will roam the maze 
just as you do, some seeking you or 
your possessions , some accompanying 
you, some avoiding you, and some not 
really caring whether you come or go. 
You may make them your friends or your 
enemies by your actions and inactions. 
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Adventure -arcade Game 



Hers, vou may choose the inanimate ob- 
jects to occupy the mazes, determine 
their importance and power, and select 
the randomizing factor that will ohange 
your choices so that the element of 
'surprise is not lost. Here also, you 
must select your own role, power, ace, 
rank, sen, fantasy -nationality, height, 
weight, build, skills, knowledge, and 
beliefs (religion). Since this is a 
role-piaying game. These characteris- 
tics will change as you travel through 
the maze. 

All of the important elements of the 
game will be saved to a text file each 
time an important decision is made by 
you. And the entire "map" is saved as 
one of the pics as it is updated in 
your travels. Another person may play 
the same game yet that person will have 
a different maze, different personalit- 
ies, different goals and ambitions, 
even though the "same" game is being 
played... That's because the Maze- maker 
and Personality -maker will customize 
the game for that person. Your map, con- 
sistent in every game you play, will bo 
different from the other person's map. 
That means that you oan continue to 
play the game you started, or create a 
new one for yourself, or for a friend. 
In this way, you can even create a 
scenario to challenge a friend's ad- 
venturing spirit. This game is not all 
"kill or be killed'V As a role-playing 
game, all the relationships are more 
subtle and comnlex than standard adven- 
ture games. In this adventure, you can 
cultivate lasting friendships , help 
them build bridges and fortresses, help 




defeat their enemies, fall in love, 
have children. You can even change 
your goals, sinoe no score is kept. Or 
you may decide that family life is bor- 
ing, and continue your quest before you 
die of old age... 

There is no need to greedily accumu- 
late wealth, because sometimes it can 
lead to your detriment. Some valuables 
were stolen, and their rightful owners 
are searching for them and the "thief". 
Some valuables are cursed, bringing 
doom to their possessors. Others are 
evil, or good, or simply fake. Your 
wealth is valuable in acquiring land, 
assistance, property and goods for a 
long voyage , but sometimes , fortune 
falls only on the pauper and begger. 

Although you may make the primary 
choices, the program will decide what 
it is you oan actually do. If you are 
drunk, or injured, or otherwise incapa- 
citated, your command to fight will 
lead to early defeat and imprisonment. [ 
It you are cursed, your best ' intentions 
will lead to disaster until ycu remove 
the evil aura. 

Your adventure is an odessey and is 
recorded in a special history text file 
<if ycu choose) so that you may review 
your past for clues to your present 
predicament... (what led you to this di- 
lemma? Was it because you failed to 
help the dying monk, or was it because 
you helped the woman in the bar? How 
can you make up for your act?). This 
enronicie will nave dates beginning 
with the year 2000 D.A. <During" Adven- 
ture), and will also be documented with 
national and religious holidays, birth- 
dates of important adventure characters 
(like the king's ball, which you must 
attend), and other miscellaneous his- 
torical notes which may offer clues to 
your auest's attainment. 

Is this too much to ask of an adven- 
ture? No. And there must be more... 



Nest time: How to write a variable 

maze--maker and personality (character) 
profiler (the initiaJ module) and a 
short program to display the "map" so 
that we can examine the maze structure 
in order to understand exactly what a 
maze consists of and how it can be cus- 
tomized. The map-maker program will 
use shape tables DRAVn, SCALEd, and 
ROTated on Hi-Res page 1 (hgr) so you 
might want to study that section in 
your apple-soft manual. 

Until next month, think about what 
else this adventure needs and send in 
your ideas to: B. dec) Bryte, c/c 
HardCore Computinu. 
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SPACE = SHOOT! 



ESC = NEW GAME 




■_' '..• t.> rr l_ » '..■ L.. ■„< '_> 



TANK * * 

'ftLl'E *** 

IS * -4 

■-.=> am* g OFT KEY TEXT INVADERS 2.0 



<-LEFT 



RETURN = .STOP 



RIGHT -> 



Text Invaders 2.0 was written as an exer- 
cise in apptesoft string* manipulation and evolv- 
ed into the 2.0 version Listed here. It will be 
planted in HardCore Computing #2 as the first 
Apple Softift column whore it will be listed in 
"RUNning" segments for easy debugging. It will 
then be a lesson in usina Applesoft strings 
Euuotieus such as MID*, LEFTS, RIGHTS, LEN, 
STRS, VAL. etc. But for now, it is presented as 
an interesting arcade-style game that you can 
type in now. 

Likfe the arcade counterpart, Text Invaders 
has the "thump! thump!" of advancing invaders. 
And their Deouliar march beefc and forth and 
down is duplicated in this text version by us- 
ing the two slashes and these: "< >" as the 
legs (see illustration of screen image). 

However, unlike the arcade version, these 
invaders are not destroyed by just any missile 
strike. Oh no... You see, your tank has a "hit 
power" of 1 through 9. The invaders also 
have that range of "hit power". If your hit 
power is less than that of the invader your 
missile strikes, that invader is not destroyed, 
only lowered in hit power. Each time the in- 
vnder drons one of its bombs (a plus sign in 
this version), its hit power is reduced by one 
until it reaches aero... when it vanishes. And 
each time you are destroyed by one of the 
descending bombs, your tank also loses a hit 
power until you reach zero... when the game 
ends. 

Your skill choice, elected at the beginning 
of the game, determines the number of advanc- 
ing invaders. Pick level 1 (beginner) and you 
get only five invaders. Wipe them out and your 
skill level advances by one and new invaders 
appear, closer this time. First time out, don't 
pick 5 (export) 

The bunkers that protect you from the fall- 
ing bombs will disentegrate slowly, but if you 
shoot through it, you'll carve a neat hole all 

the way through. 

The bombs that make it past the bunkers 
and miss you will dig a hole in the ground. 
But don't worry. ..it's just there for the effect. 
Likewise, your overshot missiles will dig holes 
at the top, too. 



Vh.tt are the keyboard commands? 

The two arrow keys determine the tank's di- 
rection of travel. The RETURN key will make 
your tank stop. And the space bar will fire a 
missile (an exclamation mark !). Retiring a mis- 
sile will cause the destruction of any missile 
already in flight. Finally, the ESC key will 
start a new game. 

The listing is in an experimental format. 
Because the program is Applesoft, only the 
first two characters of any variable name are 
important. Those two characters have been 
left capitalised while the remainder of the 
variable name is in lower case. All REMarks 
have been removed, but you can type them in 
by using a line number just one number below 
the line you are explaining. In this way, all 
remarks will have 9 as a final digit. 

Since there are many PRINT statements, all 
so aces within such statements have been re- 
placed bv a squiggle so that space counting is 
simpler and easier. 

There are three "destruction modes" for the 
invaders, depending on whether your missile 
has hit them on the left or right side, or 
smack in the middle. Scoring also depends on 
whfere you hit them. A direct bit is best. 

There are many improvements that oan be 
added to it... whioh I leave to those interest- 
ed. Some that I suggest: 

Make more than one row of invaders. 

Let them drop more bombs. 

Let your tank shoot more than one missile. 

Use the entire screen for a battle field. 

Use the paddles. 

And most of all... Compile it with one of 
the new Applesoft compilers now available. ..and 
speed it up! Of course, you'll have to change 
some of the sound routines. And you'll have 
to slow down their march toward you since the 
game will be running incredibly fast once it is 
compiled. 



Use a character 
strings into unique 
t ho arcade versions . 



generator to change the 
hi-res shapes more like 



Ont last note: Notioa the way that the 
SCRN command is used on the text page... 
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HftROCGRE Comipu 1 1 n a 

Text Invaders 2.0 

Copyriaht L3S1 

by SoftKey Publishing 

P.O. Box 44543 

Tacoma, Wfi 33444 



RBts replaced by these symbols; 

'=== -== SUBROUTINE ■ 

— . Elements In ft Subroutine — ™- — -- 

***********CENTRftl_ PRGGRfiH************* 

Spaces in PRINT Statements replaced by -■■ 



8 REM TEXT INVADERS 2.8 

1 GOTO 18888 : REM C. 1381 SOFTKEV 

PUBLISH INS* POB 44543, TfiCQHfi, Wfi 3S444 



=^===eET ASCII OF &*¥ SCRN 

10 %mm*& = X?; - 1 : Wkey* = 2 * < 

>?4 - i ; 
28 KKea* = SCRN < %msm& , YYkeyE > 

+ IS * SCRN ( XXkey* , Wkes* + 

1 > : RETURN 



*MOUE TANK MISSILE 



38 UTfiB TUrayJ; : HTAB THray;; : PRINT 

"''''" " ■ RETURN 
35 UTfiB TUrayJ : HTfiB THray* : PRINT 

" ! H i '. RETURN 
48 IF TUrayJ > 8 THEN SOSUB 38 : 

HTftB THray* ; PRINT *•** i 
45 THras* » HSun"; : TUrayJ = UGun>: - 

2 : SOSUB 35 : RETURN 
58 IF TUrayJ £ 1 THEN RETURN 
52 SOSUB 38 : TUray* = TUrayJ - 1 : 

GOSUB 35 : IF TUray < 5 THEN 

SOTO 38 
55 YX = THrayi: + 1 : VSi = TUrayJ - 1 

: SOSUB 18 



:HftS MISSILE HIT ANYTHING?-- 
<SPfiCEJ'- move on up 



SO 



IF !Mm% = 168 THEN RETURN 



K + .f hit a bomb — — 

65 IF XKey* m 171 THEN 388 

_. . — not near inuaders, so return 

78 IF TUrayJ < Ulnuader-;-: OR TUrayJ > 
U Invader"; + 1 THEN RETURN 



;-_ ] > ./ ■■■. ni ^ mvader left side 

75 IF XKey?; = 221 OR XKey?i = 133 OR 

XKey/; = 175 THEN SOSUB S88 i Rftn*; 

= m ~ H Invader* : GOTO 318 

— , — £ i \ ■■., } nit invader risht side — -- 
38 IF XKea* * 213 OR XKey* = 138 OR 
XKea>; - 228 THEN SOSUB S28 i RAn* 
= X'4 - HInvader;-; - 2 : GOTO 318 

-— -■ £ anything else > hit dead center — - 
35 GOSUB S18 : RAn* = $£ - HInvader"; 
- li SOTO 318 

C destroy the fissile 'i 

38 FOR ft = 1 TO 4 : UTfiB TUrayJ : 

HTftB THraafc : PRINT *** ; : BUZZ 
= PEEK i NOise ) : FOR B = 1 to 5 
: NEXT B : HTftB THraa* ; PRINT 
"■*" i : BUZZ = PEEK t NOise ) : 
NEXT ft : TUray* - 8 : RETURN 



=-^===HAS KEVBOARD BEEN HIT? — 

188 KEy* = PEEK < KEa > : IF KEa*: > 

127 THEN POKE STrobe , 8 
118 IF Displays fiND F Shoot:; < 8 THEN 

KEa* = ISO 



= 128 



— LESS.' start new same — ~ 

IF KEa* = 155 THEN GO:; = 1 : GOTO 
18888 



158 



— — £ SPACE 3 -shoot, off cannon— 
IF KEa?: = 1S8 THEN fill?: = 1 
GOSUB 48 



£ RET URN j stop tank motion— — 

IF KEa* = 141 THEN TTravei;; = 
PAuse* 



168 



— — £ -=> ;: tank aoes risht 

IF KEsft - 143 THEN TTravei:-; = 
Rlaht:; i Display?; = 3 ; SOTO 208 



£ <=- > tank soes left — ■ 

178 IF KEyJ; ■ 136 THEN TTravei:-; = 

LEft* : Display:; = 8 : GOTO 388 



£ make tank travel 3 

138 ON TTrauel* GOTO 288,388*358 



*********** TftNK GOES RISHT ************ 
288 HGunJ; = HGun* + 1 : IF HGun*; > 36 

THEN HSun* = 38 : TTraveP; = 

LEft:-: : RETURN 
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*********** NGUE THNK ****************** 

!! clear old tank from sei*ee^:| ■ — 

&$ UTAB UGunX : HTAB 1 : CALL -8SS : 
UTAB UGur# - 1 : CALL -SS8 



<. wake new tank } — 

£20 UTAB UGun* : HTAB HGun* - 1 : 
PRINT "=" i : INUERSE : PRINT 
PQwer"; ; : NORMAL : PRINT "*" j 
238 UTAB U6un>: - l ; HTAB HBun* : 
PRINT "I" i : RETURN 

************* TANK GOES LEFT *********** 
388 HSun* = HGun>; - 1 : IF HGur.:: < 3 

THEN HGun;: = 3 : TTravel"; = 

RlshU: : RETURN 

************** TANK STOPS ************** 
358 GOTO 218 



==■ = DISPLAV TANK POWER 

4UU m - I 3 FOR A = 13 TO 23 : FOR 

AA = 1 TO 5 
418 UTAB A : HTAB AA + 5 
428 Piece* = MID* < PGwer* ( PGweK; > 

< B;: i 1 ; 
438 INUERSE 
458 PRINT Pieces i : NORMAL : B2 = g*J 

+ 1 : NEXT AA , A ; RETURN 

== ~- = HOUE INUAOER BOMBS ■ ■ 

580 IF IHray* = % THEN 388 
518 IUrayJ; = IUray>: + 1 : Wa = IHray£ 
+ 1 : V* = lUray* : 60SUB 18 

~~~ — ■ — ■ — C just open space > — ° — 

528 IF XKey"-: = 1S8 OR XKeyJ; = 176 
THEN 788 

— , — ,__. — £ tjotvtti hits Missile 5— — • 

538 IF XKey = 161 THEN 388 

__ £ bomb hits bunker u— — — — — 

548 IF XKey* - 32 OR XKey* =111 THEN 
858 

— — i inverse SPACE} bo«b at bottom-—- 
558 IF lUray* > 17 THEN758 

__. . £ -^ank is hit '1- — 

578 INUERSE : SOSUB 13288 : POwer* = 

POwer^C - 1 : IF PGwer* * 8 THEN 

21888 
5S8 UTAB UGun* - 2 : HTAB IHray* i 

IHray* = 8 : PRINT "'■-" ; 

530 GOSUB 480 : RETURN 



688 



88* 



616 



ei: 



628 



== INUAOER HIT ON LEFT SIDE = — 

FOR ZAp = O TO 2 : UTAB Ulnvader* 
+ 1 : HTAB >C< - 1 ; GOSUB 638 : 
UTAB Ulnvader* : HTAB X* - 1 s 
GOSUB 638 : HTAB !& : GOSUB 638 : 
HTAB i m + 1 : GOSUB 838 : UTAB 
U Invader^ + 1 : HTAB X* + 1 : 
SOSUE 638 : HTAB X* i 60SUB 638 
: NEXT ZAp 

BPomts* = ; GOSUB 1688 : GOTO 
640 

>== INUAOER HIT DEAD CENTER 

FOR ZAP = 8 TO 2 ; UTAB Vlnvadzr'4 
: HTAB X* - 1 : SOSUB S38 : HTAB 
&S - 2 : GOSUB 638 : HTAB Y,'4 : 
GOSUB 638 : UTAB U Invader* + 1 : 
HTAB XSj - 2 : GOSUB 638 : HTAB K% 
: GOSUB 638 : HTAB Wi - 1 : GOSUB 
S38 : NEXT ZAp 

BPoints* = 18 : GOSUB 1S88 : GOTO 
S48 

INUAOER HIT ON RIGHT SIDE ===== 
FOR ZAp = TO 2 : UTAB Ulnvader* 



82? 



+ 1 



HTAB x* - 



GOSUB 638 : 



UTAB Ulnvader* : HTAB X* - 1 : 
GOSUB 638 : HTAB X* - 2 : GOSUB 
838 : HTAB Kg - 3 : GOSUB 638 : 
UTAB Ulnvader* + 1 : HTAB & - 3 
; SOSUE 638 : HTAB &£ - 2 : GOSUB 
638 : NEXT ZAp 

BPoints* = 8 : SOSUB 1688 : SUTO 
648 



- — ■ Destroy Invader — -— 

838 PRINT ZAp* <zap> : BUzz = PEEK 

£ NGise > + PEEK < NOise > : 

RETURN 
648 THray* = 8 : TUray* = 8 : GOTO 378 



CONDENSE INUADERS^ 



i Condense Riant Side i .— 

658 IF MID* i INvader* < 1) , LEN 

i INvader* tl> > - 2 , 1 t - *■*#■ 
THEN FOR AA = S TO 2 : INuaderS 
<AA'J = LEFT* i£ INvader* <AA) * 
LEN < INvader* <AA) > - 4> : NEXT 
AA : IF LEN i INvader* ( t-3 ') > 4 
THEN GOTO 658 

C Condense Left Side 3 

668 IF HID* < INvader* (l)i4«i J 
= »** THB4 FOR AA = 8 TO 2 : 
INvader* (^ = "*>" + RIGHT* 
i INvader* tAAi > LEN i INvader* 
<AA> ) - 5 ) : NEXT AA ; 
H Invader"; = H Invader^ + 4 ; IF 
LEN £ INvader* U) ) > 6 THEN 668 
638 RETURN 
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?m 



758 
778 
738 



'30 



888 
SI 8 

320 



338 



358 

380 

330 
380 

385 
318 
328 

f 

338 
"335 

348 

345 



HQUE INUAOER Rfty 350 IUray": - Ulnvaderfc + 1 : IHray^ = 

UTfiB IUrayJ-: : HTfiB IHray"; : PRINT RfiftX + HlnvaderX : SOSUB 788 : 

" + " ; : UTfiB lUray* - 1 : HTfiB UTfiB UI wader X : HTfiB IHraa* : 

IHraaSi : PRINT ">■-" i : RETURN INUERSE : PRINT TE*p* i : NORMAL 

388 ss;: = 8 

= INUflDER RAV HITS BOTTOM 378 INuader* ( 1 ) = LEFT* I INvader* 

UTAB IUray'.' - 1 : HTfiB IHray': : <1°), Rfln* > + TEmp* + MID* I 

PRINT "■-■■" ; : FOR T = 1 TO 5 INvader* <1> ,» RfinJ; + | ; 

INUERSE : UTAB IUrayJ: : HTfiB 338 IF TEtfP* = ""-" THEN FOR fifl = 8 TO 

IHray* : PRINT V i : SOSUB 1538 2 : IN^ader* <LAA> = LEFT* i 

NORMfiL : HTfiB IHray* : PRINT CHR* INvader* <fifi> , Rfir.:-: - 1 > + 

(223) i '. GOSUB 1538 »-,w + HID$ i INvader* (fifi; ., 

HEXt T : IHray:: = 8 : RETURN RAn* + 3 ) : NEXT fifi 

338 SOTO S58 

UTflB IUray* : HTfiB IHray:-: : PRINT *********** MAIN SAME SEQUENCE ********* 
""■" i ' IUray>' - 8 • IHray^' = 8 

FOR fl = 1 TO 10 : BUzz = PEEK < ise8 IF ^Invader* = 15 THEN 218O0 

NQise > ; NEXT Pi : UTfiB TUray* : r , „ „ _. 

HTfiB THray:-: : PRINT ■**'■ ; ffS'**™*2* P^VE/ JJSUSf*"'** 1 * 

FOR ft = 1 TO 18 : BUzz = PEEK C ^18 FOR RHwbh* = 8 TO 188 STEP 

NOise ) : UTfiB TUray>: : HTfiB Ulnvader* * lu 

THraaJi : PRINT *#* i : FOR B = 1 __, ^,, r ^ rrT 

TO = • NE'<T B * HTfiB THray"' a *********** CHECK KEYBOARD ************* 

PRli/'H« , | M E >^fi 1820 S0£UB 188 

TUray-i : - 8 : THray* - 8 j RETURN ^M«&£3&#* l^E INUfiDER BOMB *********** 

— BOMB HITS BUNKERS = IfS T? 8 ^, 5 ?^ 0*3* c fi 

FOR T = 1 TO 6 : UTAB IUray* - 1 }S| ILS^Sf 6 °° U& * 

: HTfiB IHray?: : INUERSE ; PRINT *fg fSS 5£ hs 

"-" ; : UTfiB IUray:: : HTfiB IHray* ltJjS G0T0 ^ S 

: PRINT «%* i : GOSUB 1530 _ ======= ^ tkltao ,, ^k,«»'/ 

UTAB IUrau* - 1 : HTfiB IHray>: : 7ZZT~ ew» fa- - 5 mJ e ' tfiwS^™* . -rar 

NORMfiL : PRINT ■*" i : UTfiB 158S 5£ " h ". « ™ «Lj Kg?*** : IF 

IUrayJ: : HTfiB IHray?: : PRINT -V FRhyU™,. > 8 THEN U28 

i : SOSUB 1538 : NDiT , . . , ±j 

lHrav'4 = 8 : RETURN ~7n """ ~ bc±S m ' * "dccl--- 

1510 Zl = PEEK ] s NUise ij - PEEK 

= INUflOER RAV fiTTRCK < ^** > ■ 30T0 1538 

m - RND i 1 % * N^ ; Rfln?: m RJ: * , 

4 + 3 : IF LEN ( INuader* a; > < " e " " I" " «^- MnT. - si" pert-" 

5 THEN UTflB Ul^ader?: : HTfiB 1 , 15 ^ f i£i-?f - IS^ta« 
CALL -383 : UTAB Ulnvader* + 1 : < MDx ' 3s " J ! &0T0 i5c,& 
CALL -383 

THEN fin pETURN EH ' ***** ^ * » 2SS » "ffi»f\ *8S 5 S i^SN 

tSp* Fll < INvader* til, 1530 "^ ft : RETL,RN 

i&uft = X UflL ( TBip* > ; IF TE«p* T^T^T^^T™}},? ■ P ? I K TS ~37TT"I = 

= "'-" THEM 380 16es TPomts;: = BPoim,s.-; * SKill^i + 

11 -'SOTO ™ THEN TE ' aP!: = TE '" P;: ' 1«« W^lVJ^S : INUERSE : 

IF kf THEN IF TE M P !: < = P0«r= : Pg INT ^ " \>l"™ 'iMnL™™ 

THEN tBmU = 1 TPomts?: i : NORMfiL : RETURN 

f'Bsp*£ = TEwp;-; - 1 : Qlnvader?: = , ..._„. dw *«*£»* 

IUray;-: + 1 ; TE,v,p* = STR* jj TE^p^ ^ T'lZ T ^f^ ^f^VTTT^T 

> : QHiU: - Rfinl: + HInuader* ; IF 2000 IF LEN < INvader* M> > < 5 THEN 

TEwp;; < 1 THEN TErtP* = "-' , ^,, f 8Q ™ #iy , e ^. v THPH »_ 

^p SS ; ; j H qj ggg 20ly IF ITravel.-: = LEi t,^; THEN *ioB0 
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***** ****** IMUfiBERS 60 RIGHT ********** 

2488 HI invader": = H Invader"; + 1 : IF 

Hlnvader*: > 37 - LEN i INvader* 
US i5 THEN I Travel:; = LEft*: : 
UTfiB Ulnvader*-: : HTfiB 1 : CfiLL 
-SSS : IF SKU1*; < 3 THEN 
Ulnvader*: = Ulnvader*: * l 

2418 UTfiB Ulnvader*; : HTfiB 1 : CfiLL 

-383 : UTfiB Ulnvader;: + 1 : HTfiB 
1 : CfiLL -SSS 

242B UTfiB U Invader': : HTfiB Hlnvader*: • 
PRINT INvaderS <1> : UTfiB 
Ulnvader': + 1 : HTfiB Hlnvader*: : 
PRINT IMvader* t FRhathw*: + 1 ) ; 

2438 FRhytrwtf = - F Rhythm : GOSUB 
1588 : GOTO 1888 

*************IMUflDERS GO LEFT*********** 
2588 Hlnvader*: = Hlnvader*: - 1 
2513 IF Hlnvader*: < 2 THEN UTfiB 

Ulnvader': : HTfiB 1 : CfiLL -SSS j 
ITraveP: = Right,?; i Ulnvader*: » 
U Invader*: + 1 
2528 GOTO 2418 

************ FILL UftRlABLES ************ 
18888 SPEED= 255 : NOTRfiCE : NORMAL : 

TEXT : HOME 
18108 NOise = -1633S : STrobe * -163GS 

: KEy = -16384 
10118 Hlnvader*-: = 3 : Ulnvader;; = 4 : 

ITravel*: = 1 : 1$ = "9" 
18120 Rlsht* = 1 : LEft*-; = 2 : TRavel*: 

= 2 : FRhyth*": = -1 
18138 POwerv; = 3 : TTravel*-: = 2 
18148 HGUhtt = 13 : UGun*: = 17 : 

Display;; = 1 
18150 BUnkerS = CHRS <228> + CHR* ^233) 

+ CHRS <228) + CHR$ <23S> 
10160 lUrayJ; = 8 : IHray*-; m 8 : 

THray*: = 2 
18178 2ftp$ (m = "*" : 3ftp$ <t> = ":" : 

Zfip$ (2) = "--" 



DATA STATEMENTS 

" *** ** *##* **** ** **# " 

" HA ifctt 44 &tt itit >* 

fT ri it ■ if n ^^w w^ 

"**** ** *** ** *****" 

"** **** ******* ** *** 

»####### *### ttttttttt " 
"** *# **** ** ** *** m 

tfj mjtAjt «4 ** j** j£*± » 

TTTTWtHF WW Tnf TT^T \T W 

" *** ** ** #** ** ** *** " 

" ±±±tit tCA HA tt tttttt an tftt" 

"I It Tl El II If Tr" TT fi IT If TTTr TT FT 



18508 


DfiTfi 


18518 


DfiTfi 


10528 


DfiTfi 


18538 


DfiTfi 


10548 


DfiTfi 


18558 


DfiTfi 


18568 


DfiTfi 


18570 


DfiTfi 


105S8 


DfiTfi 


185S8 


DfiTfi 



************* FILL STRINGS ************* 
18680 IF GO*: then 11888 
18S08 ERr$ = "CHOQSE^NUMBER-FROM-'l-' 
TO-5" 



18308 FOR R = 1 TO 48 : SPace$ = SPaceS 

+ "--" : NEXT fi 
10318 FOR R = 8 TO 3 : REfiD POwer* <fi> 

: NEXT fi 

****£********** GRAPHICS *************** 
11888 INUERSE : FOR fi = 3 TO 24 : 

UTfiB fi : HTfiB 1 ! PRINT SPace* i 
: NEXT fi 
11018 UTfiB 13 : HTfiB 24 : PRINT 

" c COPE" H 
11820 UTfiB 13 : HTfiB 2 : PRINT "TANK" : 
PRINT "UflLUE" : HTfiB 4 : PRINT 
"IS" : HTfiB 3 : PRINT "-=>" > 
11838 UTfiB 22 : HTfiB 14 : PRINT 

"SOFTKEY-'TEXT^INUfiDERS-^.O" ; 

11058 NORMfiL 

110S8 UTfiB 24 : HTfiB 2 : PRINT "<-LEFT" 
i : HTfiB 15 : PRINT "RETURN-^ 
-STOP" i \ HTfiB 33 i PRINT 
"RIGHT— v" ^ 

11870 UTfiB 1 : HTfiB 2 : PRINT "SPfiCE"-- 
^•SHOOT!" i : HTfiB 20 : PRINT 

11188 POKE 32 * 1 : POKE 33 * 33 : POKE 
34 i 3 : POKE 35 , IS 

11118 UTfiB 3 : HTfiB 1 : CfiLL -35S 

11200 FLASH : FOR fi = 13 TO 15 : UTfiB fi 
: HTfiB 4 : PRINT BUnker$ ; : HTfiB 
13 : PRINT BUnker* i '. HTfiB 22 : 
PRINT BUnker* i : HTfiB 31 : PRINT 
BUnkerS ; : NDiT R : NORMAL 

11218 GOSUB 40O 

11228 GOSUB 210 

*********** INPUT SKILL CHOICE ********* 
12008 UTfiB 7 : HTfiB 7 : PRINT "HHAT^-IS-- 
VOUR-SKILL^LEUEL?" i : UTfiB 3 : 
HTfiB 3 : PRINT "1 2 3 4. 

...5" i : UTfiB 11 : HTfiB 14 : 
PRINT "<^PICK'-ONE'->" i 

12818 fi - 5 

12828 KEy:-; = PEEK t KEy ) j IF KEyJ; < 
127 THEN 12058 

12830 IF KEyJ; < 177 OR KE'=^; > 1S1 THEN 
UTfiB 2 : INUERSE : FOR B = 1 TO 
LEN C ERr$ ) : HTfiB B + 5 : PRINT 
MID* * <. ERr* ) > B * 1 ) i : 2 - 
PEEK <: NOise > : NEXT B ; PRINT 
CHR$ <.?> i i POKE STrobe , 8 : 
HTfiB 5 : PRINT RIGHTS i SPaceS , 
LEN ( ERr$ ) + 1 i : NORMfiL : 
GOTO 12820 

12848 3KU1*: = KEy*-; - 178 ; GOTO 12100 

12850 UTfiB 3 : HTAB fi * 5 + 4 : INUERSE 
: PRINT fi ; : 22 = PEEK £ NOise ) 
- PEEK t NOise > : FOR C = 1 TO 
28 ' : NEXT C : NORMfiL : HTfiB fi * 5 
+ 4 : PRINT fi i 
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12888 
12870 
12130 



12208 



12210 
12300 
123S3 



A = A + 1 : IF A > 5 THEN A = 1 

GOTO 12020 

UTAB ? : HTAB 1 ; CALL -363 : 

UTAB 3 : CALL -383 : UTflB 11 : 

CALL -863; 

GOSUB 13000 : UTflB UInuader>: : 

HTflB Hlnvader's. ; PRINT INvader$ 

n> 

GOSUB 408 
GOTO 10S8 
END 



CREATE INUftOER * 



13880 

13810 

13828 
13838 
13840 



IF SKill*-: < S THEN SKilK-: = 

SKillX + 1 

FOR fl = 8 TO 2 : INuader* <B> = 

" : m® A 

m = SKill'4 + 2 : FOR ft = 1 TO UZ 
; INuaderS %%'2 = INvader* i 1 > + 
"3" + 1$ + CHR$ <31> + "'■■" 
INuader* <8> = INvader*£ <3> + 
"/" + CHRS C220) + "■"" : INuader* 
CI'} = lNvader$<2; + "<->" 
NEXT fl : RETURN 



13200 INUERSE : SOSUB 228 : SOSUB 13238. 
: UTAB IUray£ : HTAB IKrauK ■, 
PRINT "." ; : GOSUB 13230 : 
NORMAL i GOSUB 220 

13218 UTAB UGun;; ; HTflB HGurA - 2 : 

PRINT >ife«« i i GOSUB 13238 : 
UTflB UGun* - 1 : HTflB HSum* : 
PRINT *** i : GOSUB 13238 

13220 UTflB UGun;; : HTflB HGun>; - 2 : 

PRINT »- * -" ; ; GOSUB 13238 : 
UTflB UGun;: - 1 : HTflB HGun>; : 
PRINT V i : GOSUB 13238 



13238 UTflB UGun;-: ; HTflB HGun;-: - 2 : 

PRINT iw-**.* i i GOSUB 13238 : 
UTflB UGun:-; - 1 : HTflB HGur,:; : 
PRINT *~* i : GOSUB 13230 
13240 UTflB UGun:-; : HTflB HGun;-; - 2 ; 
PRINT "--^w - s 30SUE 13238 
13250 FOR E = 1 TO 188 : NEXT E 
13268 UGun?; = 13 : GOSUB 488 : RETURN 
13238 FOR E = 1 TO 13 ; BUzz = PEEK 
i NOise % : NEXT E : RETURN 



=8ESIN ALL OUER AGAIN-- 



28888 flSain;; = PiGam*; + 1 

28818 UTflB UlnuaderJ: : HTflB 1 : CALL 

-863 : UTflB Ulnuader"; + 1 : HTflB 

I : CALL -383 
28828 UlnuadeK-: = SKili:; + AGAIN;-; : 

HInuader;; = 3 : ITrauei;; = 1. 
20830 GOSUB 13800 : GOTO 1088 



•OPTION TO PLAV ftGAIN= 



TANK DESTROYED rj1fl7 



21800 HOME : UTflB 5 : PRINT "70UR-FINAL 

--SKILL-'LEUEL-'HAS " SKili;; ; 
21818 UTflB 13 : HTflB 5 : PRINT "YOUR*- 
;CORE has * pt*;; ; 

1878 UTflB 13 : HTflB 5: PRINT "CO-VOU-- 
HISH-'TG^TRV-'fiGAIN^'TVNr i : GET 
ANswer$ : IF BNswer* = "V" THEN 
GO?: = 1 : GOTO 18888 

21888 IF ftNswer* = H N" THEN TEXT : HOME 

21838 GOTO 21870 

************* End Iff Listing ************ 
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Our Dremier issue had no data on it (sort of 
Like Nibble... ). However, for those who must 
have dates... These are the dates you can as- 
pect the next issues and updates to he out: 



Issue *2 




— October 


f Update 


2.1 


— November 


Uodate 


2.2 


— December 


Issue #3 




— January '32 


Undat e 


3.1 


— February 


* Uodate 


3.2 


— Macon 


Issue #4 




— April 



We hope that by then we will be able to go 
bimonthly (and later, go monthly) but that will 
uepend on how many subscribers we have and 
how many articles and programs we receive. 
So krten on mcruitinc hard-oore oomouterists... 



Good news for those who complained that 
our first issue was a bit thin. Issue *2 will 
have about twice the pages. 

II you wrote letters to us asking questions., 
those letters will probably be answered in 
HARDCORE 2. 

Also. ..watch for a review of a bit-copy pro- 
aram !;hat we misned last time. It's called 
"NIBBLES AWAY" and we will bo revitwino it 
in HARDCORE 2. 



The SoftKeys in the first issue were not 
aimed only at people with Apple lis. Tor you 
Apple II nlus people who don't have an 

intoqer card, you oan still use the SoftKeys 

details in the uooommc! issue. 
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Creative Computing Censors Hardcore Advertisement 



Creative Computing is stiil censoring ads and suppressing in- 
formation about copy protection. It has just refused to publish the 
HARDCORE advertisement shown on this page. 

subscribe to... 

HARDCOR 



Computing 

i 

for Apple-users worldwide 



the 

magazine 

that 

shows you 

how to ! 






Subscriptions 



U.S.A sio.ua . 
Canada 523.50 - 
5. America S37.53 
F3- r Mex.. Central America 532.50 
-/• All others $42.0(1 



Back up any diskette . 
Do S undo copy-protection. 
Encrypt confidential data files. 

Customize 

your 
commercial 
programs^ 

PLUS... 

game, utility, business & 
educational program listings 
and... 
hardcore 

columns on: 
D.O.S. 
program tricks 
writer's markets 
Appktdigest 
software reviews 
adventure tips 



HARDCORE Computing 

Dept. P-2. 

14404 East "0" Street 

Tocoma, WA 93445 

U.S.A. 



t of Appii Computm* inc. J 



Dealers inquiries invited 



Attention Apple Clubs 



Attention ail Apple-users groups. We want to know more 
about your club. Please send us a letter telling us about your 
membership, goals, constitution and bylaws, founding date, dues, 
benefits of membership and newsletters, etc. 

Address it to: A.CI.G. SURVEY in care of this magazine. 

Hardcore Worms 

Try as we might to be perfect, we still made a few 
errors: 

The most important worm is on page 28, DEMUF- 
FINS... We left out the "less than" sign on DEMUFFIN 
PLUS. Steps 5b and 5c should read: 

b. 190CXB800.BFFF Ctrl Y* return 

c. 19OCKB8O0.SA10 Ctrl Y return 

The next worm is on page 29, SHEX-DECIMAL , 
CONVERSION CHART, In the second column, the bottoms- 
row reads: S12-28. It should read $12-18. It's obvious 
from the way the numbers increment... but it slipped right 
by us. 

Now on to page 31, DISK LOCKS, the second col- 
umn (inside the artwork), the second paragraph (dealing 
with using MUFFIN to upload programs to your orotected 
disks from a 13-sector disk). Well, step 2 says to BLOAD 
DEMUFF1N. It should say: BLOAD MUFFIN. W 

That's all we've caught so far. 
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What did the editors of CC find unprintable in our ad? 

"Only two fines," explained their Advertising Manager, Jerry 
Thompson. "They are: 'back up any diskette', and 'do & undo copy- 
protection'." 

Jerry said that either we agree to let them remove those lines 
or they would refuse to run the ad. Well, we stood by our editorial 
policy of fighting censorship and they stood by their policy of infor- 
mation suppression. So you won't see this ad in CC. 

One of their editors, George Blank, defended CC's policy by 
offering the lame comparison to Reader's Digest's policy against 
running liquor ads. He added that at least CC will run ads for com- 
petitors. 

Big Deal! All of them share CC's censorship policy. All of 
them... except HARDCORE COMPUTING. And they will not run our 
ads. 

George's final defense was that CC had a readership of well 
over 1 00,000... so obviously they must be doing things right. What 
can I say to that? 

And when 1 mentioned that the readers have had no alter- 
native, he answered promptly, "Yes, they do!" (meaning his com- 
petitors). I retorted that they practice the same form of censorship. 

"That might mean that we're right and you're wrong," he 
concluded. 

So... The battle goes on. 

CC is probably just the first computer magazine to censor 
HARDCORE'S ads. We plan to try to put one in Call A.P.P.L.E., but 
unless Val Golding, the editor, has altered his policy, they will pro- 
bably refuse to run our ad. too. 

We'll keep you posted on further developments. 

DiskEdit updated, but late 

All those of you who have ordered DiskEdit 1.0 will receive 
the updated version 2.0. 

We have back-ordered the disks and they should be arriving in 
a week or so. so please be patient. 

Yes, We're Gopyable! 

Material in HARDCORE (Computing, Updates, and Alerts) 
may be reprinted without permission by school and college 
publications. Apple-users groups may also reprint this material if 
they run (in the same issue) the AD shown on this page along with 
this notice: 

COPYRIGHT c 1981 

SoftKey Publishing 

The AD may be larger than shown, but not smaller. 

The reason for this is simple: We need more subscribers. And 
somebody has got to run our ads... We worked so hard on them... 

Don't forget to send us a couple of copies of that issue. In 
fact, we'd be pleased if those clubs would add us to their mailing list 
so that we can keep up with your doings... OK? 
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Send in your nominations for 
the Garbage Award 



\ 



Ever spend good money for a program that 
turned out to be just garbage, a program that was fill- 
ed with worms (or Med-f lies}? Want to air your com- 
plaints? 

We are taking nominations for HARDCORE'S 
lowest award: the soon-to-be-infamous GARBAGE 
AWARD! 

Send in your Jist of the worst programs that you 
have purchased and explain why each is deserving of 
this highly-dishonored token of our contempt. Rank 
them according to their True Garbage Value (ie. #1 is 
your choice for Garbage Award Giveaway (G.A.G.) 
First Place). 

Get them in soon so that we can let the world 
know who has garnered this prized trophy. We'll also 
have a lonnnnnnng list of Dishonorable Unmentions, 
B^| so hurry. A. 
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YES! I want to subscribe to 



the apple Free-Press! 
Start with issue # . 

( ) Bill me 820 for a 

1-year subscription.* 

( ) Enclosed is $20 for a 
1-year subscription.* 

Mail subscription to: 

Name: 



Address: 
City: 



State: Zip: 

*U.S. rates only. Write for foreign rates. 



YES! I want to subscribe to 



HHP.IK.IM i:iii| i ii ii< 

the apple Free-Press! 



Start with issue # 



( ) Bill me $20 for a 

1-year subscription.* 

( ) Enclosed is $20 for a 
1-year subscription.* 
Send the first issue(s) now! 

Mail subscription to: 

Name: 



Address: 
City: 



State: Zip: 

*U,S. rates only. Write for foreign rates. 
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YES! I want to subscribe to 



the apple Free=Press! 



Start with issue # 



C ) Bill me $20 for a 

1-year subscription.* 

( ) Enclosed is $20 for a 
1-year subscription.* 
Send the first issue(s) now! 

Mail subscription to: 

Name: 



Address:_ 

City: 

State: 



YES! I want to subscribe to 

UflNBBErBE BMipiitirig 

the apple Free-Press! 
Start with issue # . 

( ) Bill me $20 for a 

1-year subscription.* 

( ) Enclosed is $20 for a 
1-year subscription.* 
Send the first issue(s) now! 

Mail subscription to: 

Name ; 

Address : 

City: 



Zip:. 



State: 



Zip: 



U.S. rates only. Write for foreign rates. 



U.S. rates only. Write for foreign rates. 
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